home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-05-29 | 573 b | 26 lines | [TEXT/MPS ] |
- Set stdlib "LIBDIR"
- Set includes ""
- Set options ""
-
- Loop
- If "{1}" == ""
- Break
- Else If "{1}" == "-I" || "{1}" == "-include"
- Set includes "{includes} -I {2}"
- Shift
- Else If "{1}" == "-O" || "{1}" == "-open"
- Set options "{options} -O {2}"
- Shift
- Else If "{1}" == "-stdlib"
- Set stdlib "{2}"
- Shift
- Else If "{1}" =~ /-≈/
- Echo "Unknown option ∂"{1}∂", ignored" >Dev:StdErr
- Else
- Echo "I don't know what to do with file ∂"{1}∂", ignored" >Dev:StdErr
- End
- End
-
- camlrun "{stdlib}camltop" -stdlib "{stdlib}" {includes} {options}
- Exit {Status}
-